home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / a_utils / perl / prlbkxmp.lha / apb / stat < prev    next >
Text File  |  1991-01-08  |  103b  |  8 lines

  1. require "stat.pl";
  2.  
  3. @ary = stat('foo');
  4. $st_dev = @ary[$ST_DEV];
  5. # or
  6. &Stat('foo');
  7. print "$st_dev\n";
  8.